home *** CD-ROM | disk | FTP | other *** search
/ WWII Attack! from Pearl Harbor to Potsdam / WWII Attack - From Pearl Harbor to Potsdam - Disc 1.iso / mac / Media / TABLE < prev    next >
Text File  |  1998-02-17  |  44KB  |  1,133 lines
  1. non codé
  2. --
  3. --
  4. FBBRNEXT,0 0 0 640 480 LOADMEDIA "FBBRNEXT" SHOWTEMP "FBBRNEXT"
  5. FBBRPREV,0 0 0 640 480 LOADMEDIA "FBBRPREV" SHOWTEMP "FBBRPREV"
  6. --
  7. MouseInBDates,0 0 10 65 34 SENDSWITCHMSG "quit",0 65 10 115 34 STOPALLMOVIE "" OPENRECHERCHE "",0 243 10 307 34 STOPALLMOVIE "" SENDSWITCHMSG "switch",0 308 10 365 34 DOFUNCTION "gopartemp",0 366 10 430 34 DOFUNCTION "openaide"
  8. FeedBBDates,0 0 10 65 34 SHOWTEMP "ZFBQuitter",0 65 10 115 34 SHOWTEMP "ZFBRecherches",0 243 10 307 34 SHOWTEMP "ZFBScenario",0 308 10 365 34 SHOWTEMP "ZFBParcours",0 366 10 430 34 SHOWTEMP "ZFBAide"
  9. --
  10. DownInGdHall,0 0 0 32 480 HIDEMEDIA "Focus",0 608 0 640 480 HIDEMEDIA "Focus"
  11. DownInPanoTh,0 0 0 32 480 HIDEMEDIA "ZTSfocus",0 608 0 640 480 HIDEMEDIA "ZTSfocus"
  12. --
  13. minintro,0 0 0 640 480 DOFUNCTION "finintro"
  14. mingenerique,0 0 0 640 480 DOQUITTER ""
  15. --
  16. CYearPrev,0 0 0 640 480 changeyear -1 WAIT "30"
  17. CYearNext,0 0 0 640 480 changeyear 1 WAIT "30"
  18. CMonthPrev,0 0 0 640 480 changemonth -1 WAIT "30"
  19. CMonthNext,0 0 0 640 480 changemonth 1 WAIT "30"
  20. --
  21. MouseInTScroll,0 7 54 58 84 DOFUNCTION "faireretour",0 65 54 136 84 DOFUNCTION "retoursommaire",0 126 0 249 72 SETPANOPOS "PanoTh 0 0" SETMEDIALOC "ZTSfocus 126 410" SHOWMEDIA "ZTSfocus",0 250 0 380 72 SETPANOPOS "PanoTh 670 0" SETMEDIALOC "ZTSfocus 250 410" SHOWMEDIA "ZTSfocus",0 380 0 546 72 SETPANOPOS "PanoTh 1384 0" SETMEDIALOC "ZTSfocus 380 410" SHOWMEDIA "ZTSfocus"
  22. --
  23. MouseinBarBas,0 7 54 58 84 DOFUNCTION "faireretour",0 92 0 224 85 DOFUNCTION "closeall" SETPANOPOS "GdHall 1884 0" SETMEDIALOC "Focus 128 410" SHOWMEDIA "Focus" DOFUNCTION "openkiosk",0 254 0 384 72 DOFUNCTION "closeall" SETPANOPOS "GdHall 670 0" SETMEDIALOC "Focus 250 410" SHOWMEDIA "Focus" DOFUNCTION "openactu",0 416 0 546 72 DOFUNCTION "closeall" SETPANOPOS "GdHall 1396 0" SETMEDIALOC "Focus 377 410"  SHOWMEDIA "Focus" DOFUNCTION "opencine"
  24. --
  25. MInFondCine,0 0 11 38 35 DOFUNCTION "gopartemp",0 39 11 103 35 DOFUNCTION "openaide",0 0 0 640 480 DOFUNCTION "closeall" LOADMEDIA "SONGDHALL"
  26. FeedBBarBas,0 7 54 58 84 SHOWTEMP "ZFBRetour"
  27. FeedBTScroll,0 7 54 58 84 SHOWTEMP "ZFBRetour",0 65 54 136 84 SHOWTEMP "ZFBSommaire"
  28. --
  29. MInFuncsBr,0 7 54 58 84 DOFUNCTION "faireretour",0 23 27 98 50 DOFUNCTION "closeall"
  30. MInFuncsBrTh,0 7 54 58 84 DOFUNCTION "faireretour",0 65 54 136 84 DOFUNCTION "retoursommaire",0 23 27 98 50 DOFUNCTION "ThModeScroller"
  31. FBBr,0 7 54 58 84 SHOWTEMP "ZFBRetour",0 23 27 98 50 SHOWTEMP "FBPanorama"
  32. FBBrTh,0 7 54 58 84 SHOWTEMP "ZFBRetour",0 65 54 136 84 SHOWTEMP "ZFBSommaire",0 23 27 98 50 SHOWTEMP "FBPanorama"
  33. --
  34. EnterInGdHall,1 0 0 0 0 SETCURSOR 515,2 0 0 0 0 SETCURSOR 515,3 0 0 0 0 SETCURSOR 515,0 0 0 0 0 SETCURSOR arrow
  35. --
  36. MouseInGdHall,1 303 112 403 327 DOFUNCTION "openkiosk",2 782 55 942 182 DOFUNCTION "openactu",3 1737 133 1865 316 DOFUNCTION "opencine",0 0 0 3000 480 ABORTIFNIL "BarBas" DOFUNCTION "closeall" LOADMEDIA "SONGDHALL"
  37. --
  38. MouseInAttente,0 0 640 480 SETCURSOR "wait" UNLOADMEDIA "ZAttenteActu" DOFUNCTION "demarreactus"
  39. MouseInActu,0 0 0 640 480 ABORTIFNOTNIL "Vign1" SETCURSOR "wait" DOFUNCTION "clicactualites",0 0 0 640 480 TOGGLESTOPPLAY "MovieActu"
  40. MouseInTerre,0 0 0 640 480 SETCURSOR "wait" DOFUNCTION "clicterre" CLICTERRE ""
  41. --
  42. MouseInVign1,0 0 0 640 480 ABORTIFNIL "Vign1" SETCURSOR "wait" SETMEDIALOC "VueFocus 146 410" DOFUNCTION "gdhallversth" DOFUNCTION "unloadmediath" LOADUE "Vign1" DOFUNCTION "gotheatre" SHOWMEDIA "VueFocus"
  43. MouseInVign2,0 0 0 640 480 ABORTIFNIL "Vign2" SETCURSOR "wait" SETMEDIALOC "VueFocus 234 410" DOFUNCTION "gdhallversth" DOFUNCTION "unloadmediath" LOADUE "Vign2" DOFUNCTION "gotheatre" SHOWMEDIA "VueFocus"
  44. MouseInVign3,0 0 0 640 480 ABORTIFNIL "Vign3" SETCURSOR "wait" SETMEDIALOC "VueFocus 322 410" DOFUNCTION "gdhallversth" DOFUNCTION "unloadmediath" LOADUE "Vign3" DOFUNCTION "gotheatre" SHOWMEDIA "VueFocus"
  45. MouseInVign4,0 0 0 640 480 ABORTIFNIL "Vign4" SETCURSOR "wait" SETMEDIALOC "VueFocus 410 410" DOFUNCTION "gdhallversth" DOFUNCTION "unloadmediath" LOADUE "Vign4" DOFUNCTION "gotheatre" SHOWMEDIA "VueFocus"
  46. --
  47. MInBrNext,0 0 0 640 480 SETCURSOR "wait" BRUESCROLLBY "4" HIDEMEDIA "VueFocus TVueFocus"
  48. MInBrPrev,0 0 0 640 480 SETCURSOR "wait" BRUESCROLLBY "-4" HIDEMEDIA "VueFocus TVueFocus"
  49. --
  50. MInFlDroite,0 0 0 640 480 ABORTIFNIL "PanoTh" SCROLLPANOBY "PanoTh 8" LINKPANOTOSCR "PanoTh ZTSfocus",0 0 0 640 480 ABORTIFNIL "GdHall" SCROLLPANOBY "GdHall 8" LINKPANOTOSCR "GdHall Focus"
  51. MInFlGauche,0 0 0 640 480 ABORTIFNIL "PanoTh" SCROLLPANOBY "PanoTh -8 " LINKPANOTOSCR "PanoTh ZTSfocus",0 0 0 640 480 ABORTIFNIL "GdHall" SCROLLPANOBY "GdHall -8 " LINKPANOTOSCR "GdHall Focus"
  52. FBZDate,0 0 0 640 480 EDITDATE ""
  53. AFBZDate,0 -640 -480 640 480 SETCURSOR "wait" HIDEMEDIA "YearPrev YearNext MonthPrev MonthNext" ABORTIFNIL "GdHall" ENTERDATE "" DOFUNCTION "reloadactu",0 -640 -480 640 480 ENTERDATE "" LOADVIGNUE "date" DOFUNCTION "loadbrowsue" SETCURSOR "wait" DOFUNCTION "gdhallversth" LOADUE "Vign1" SETMEDIALOC "VueFocus 146 410" DOFUNCTION "unloadmediath" DOFUNCTION "gotheatre" SHOWMEDIA "VueFocus"
  54. --
  55. FBVign1,0 0 0 640 480 SETMOVIEFRAME "Vign1 300" SETTERRE "Vign1"
  56. AFBVign1,0 -640 -480 640 480 SETMOVIEFRAME "Vign1 0"
  57. FBVign2,0 0 0 640 480 SETMOVIEFRAME "Vign2 300" SETTERRE "Vign2"
  58. AFBVign2,0 -640 -480 640 480 SETMOVIEFRAME "Vign2 0"
  59. FBVign3,0 0 0 640 480 SETMOVIEFRAME "Vign3 300" SETTERRE "Vign3"
  60. AFBVign3,0 -640 -480 640 480 SETMOVIEFRAME "Vign3 0"
  61. FBVign4,0 0 0 640 480 SETMOVIEFRAME "Vign4 300" SETTERRE "Vign4"
  62. AFBVign4,0 -640 -480 640 480 SETMOVIEFRAME "Vign4 0"
  63. --
  64. UEFocus1,0 0 0 640 480 ABORTIFNIL "Vign1" SETCURSOR "wait" DOFUNCTION "gdhallversth" LOADUE "Vign1" DOFUNCTION "gotheatre"
  65. UEFocus2,0 0 0 640 480 ABORTIFNIL "Vign2" SETCURSOR "wait" DOFUNCTION "gdhallversth" LOADUE "Vign2" DOFUNCTION "gotheatre"
  66. UEFocus3,0 0 0 640 480 ABORTIFNIL "Vign3" SETCURSOR "wait" DOFUNCTION "gdhallversth" LOADUE "Vign3" DOFUNCTION "gotheatre"
  67. UEFocus4,0 0 0 640 480 ABORTIFNIL "Vign4" SETCURSOR "wait" DOFUNCTION "gdhallversth" LOADUE "Vign4" DOFUNCTION "gotheatre"
  68. --
  69. MInTBrNext,0 0 0 640 480 SETCURSOR "wait" BRTHSCROLLBY "1" HIDEMEDIA "TVueFocus"
  70. MInTBrPrev,0 0 0 640 480 SETCURSOR "wait" BRTHSCROLLBY "-1" HIDEMEDIA "TVueFocus"
  71. --
  72. MouseInTVign1,0 0 0 640 480 SETMEDIALOC "TVueFocus 146 410" SHOWMEDIA "TVueFocus" UNLOADMEDIA "ZCAMovie ZCAIMovie" LOADVIGNTH "TVign1" SETMEDIACOMPORT "PanoTh MouseInZoneOp2"
  73. MouseInTVign2,0 0 0 640 480 SETMEDIALOC "TVueFocus 234 410" SHOWMEDIA "TVueFocus" UNLOADMEDIA "ZCAMovie ZCAIMovie" LOADVIGNTH "TVign2" SETMEDIACOMPORT "PanoTh MouseInZoneOp2"
  74. MouseInTVign3,0 0 0 640 480 SETMEDIALOC "TVueFocus 322 410" SHOWMEDIA "TVueFocus" UNLOADMEDIA "ZCAMovie ZCAIMovie" LOADVIGNTH "TVign3" SETMEDIACOMPORT "PanoTh MouseInZoneOp2"
  75. MouseInTVign4,0 0 0 640 480 SETMEDIALOC "TVueFocus 410 410" SHOWMEDIA "TVueFocus" UNLOADMEDIA "ZCAMovie ZCAIMovie" LOADVIGNTH "TVign4" SETMEDIACOMPORT "PanoTh MouseInZoneOp2"
  76. --
  77. FBTVign1,0 -640 -480 640 480 SETMOVIEFRAME "TVign1 300"
  78. AFBTVign1,0 -640 -480 640 480 SETMOVIEFRAME "TVign1 0"
  79. FBTVign2,0 -640 -480 640 480 SETMOVIEFRAME "TVign2 300"
  80. AFBTVign2,0 -640 -480 640 480 SETMOVIEFRAME "TVign2 0"
  81. FBTVign3,0 -640 -480 640 480 SETMOVIEFRAME "TVign3 300"
  82. AFBTVign3,0 -640 -480 640 480 SETMOVIEFRAME "TVign3 0"
  83. FBTVign4,0 -640 -480 640 480 SETMOVIEFRAME "TVign4 300"
  84. AFBTVign4,0 -640 -480 640 480 SETMOVIEFRAME "TVign4 0"
  85. --
  86. MInSequence,0 0 0 640 480 ABORTIFNOTNIL "Vign1" SETCURSOR "wait" DOFUNCTION "clicinseq",0 0 0 640 480 TOGGLESTOPPLAY "ZSeqMovie"
  87. --
  88. MInUEMoviePlay,0 0 0 448 338 GOLASTFRAME "UEMovie"
  89. --
  90. MouseInZoneOp,4 0 0 0 0 DOFUNCTION "loadueth",1 0 0 0 0 DOFUNCTION "loadhpth",2 0 0 0 0 DOFUNCTION "loadplth",3 0 0 0 0 DOFUNCTION "loadstth",5 0 0 0 0 DOFUNCTION "loadbith",6 0 0 0 0 DOFUNCTION "loadavth",7 0 0 0 0 DOFUNCTION "loadapth",8 0 0 0 0 DOFUNCTION "loadcath",9 0 0 0 0 DOFUNCTION "loadmath",10 0 0 0 0 DOFUNCTION "loadfoth"
  91. MouseInZoneOp2,0 0 0 3200 480 DOFUNCTION "ThModeScroller"
  92. --
  93. clicinfondue,0 0 0 640 320 DOFUNCTION "ThModeScroller" SETPANOPOS "PanoTh 670 0" 
  94. --
  95. MouseInKiosk,1 0 0 3000 1000 SETCURSOR "wait" UNLOADMEDIA "ZSeqMovie" MOUSEINKIOSK "KioskPano" ABORTIFNIL "ZSeqMovie" LOADMEDIA "KioskCache" ACTIVCALLBACK "ZSeqMovie" PLAYMOVIE "ZSeqMovie" DOFUNCTION "unloadbrowsue"
  96. MInToitKiosk,0 4 14 46 52 SCROLLKIOSKBY "KioskPano -4 ",0 163 13 204 55 SCROLLKIOSKBY "KioskPano 4 "
  97. --
  98. MouseInCine,1 0 0 0 0 SETCURSOR "wait" UNLOADMEDIA "UHPMovie" DOCHOIXCINE "1" PLAYMOVIE "UHPMovie" DOFUNCTION "unloadbrowsue",2 0 0 0 0 SETCURSOR "wait" UNLOADMEDIA "UHPMovie" DOCHOIXCINE "2" PLAYMOVIE "UHPMovie" DOFUNCTION "unloadbrowsue",3 0 0 0 0 SETCURSOR "wait" UNLOADMEDIA "UHPMovie" DOCHOIXCINE "3" PLAYMOVIE "UHPMovie" DOFUNCTION "unloadbrowsue",4 0 0 0 0 SETCURSOR "wait" UNLOADMEDIA "UHPMovie" DOCHOIXCINE "4" PLAYMOVIE "UHPMovie" DOFUNCTION "unloadbrowsue",5 223 29 250 63 CINECHANGEPAGE "-1",6 223 108 247 153 CINECHANGEPAGE "1",0 0 0 640 480 DOCHOIXCINE "0"
  99. --
  100. MouseInHP,0 0 0 640 480 ABORTIFNOTNIL "Vign1" SETCURSOR "wait" DOFUNCTION "clicinhp",0 0 0 640 480 TOGGLESTOPPLAY "UHPMovie"
  101. --
  102. MInTerreBtn,0 0 0 80 80 SETCURSOR "wait" LOADMEDIA "ZTerreBtn2" LOADVIGNUE "date" HIDEMEDIA "VueFocus TVueFocus" DOFUNCTION "ThModeBrowsUE" UNLOADMEDIA "ZKioskBtn2" UNLOADMEDIA "ZCineBtn2" HIDEMEDIA "Browser" SHOWMEDIA "Browser" 
  103. MInKioskBtn,0 0 0 80 80 SETCURSOR "wait" LOADMEDIA "ZKioskBtn2" LOADVIGNUE "seq" HIDEMEDIA "VueFocus TVueFocus" DOFUNCTION "ThModeBrowsUE" UNLOADMEDIA "ZTerreBtn2" UNLOADMEDIA "ZCineBtn2" HIDEMEDIA "Browser" SHOWMEDIA "Browser" 
  104. MInCineBtn,0 0 0 80 80 SETCURSOR "wait" LOADMEDIA "ZCineBtn2" LOADVIGNUE "hpar" HIDEMEDIA "VueFocus TVueFocus" DOFUNCTION "ThModeBrowsUE" UNLOADMEDIA "ZTerreBtn2" UNLOADMEDIA "ZKioskBtn2" HIDEMEDIA "Browser" SHOWMEDIA "Browser" 
  105. --
  106. moviecaiclic,0 0 0 640 480 PLAYMOVIE "ZCAIMovie"
  107. moviecaclic,0 0 0 640 480 DOFUNCTION ""
  108. moviehpclic,0 0 0 640 480 TOGGLESTOPPLAY "ZHPMovie"
  109. moviebioclic,0 432 322 448 338 NEXTPAGE "ZHOMovie",0 416 322 432 338 PREVPAGE "ZHOMovie",0 0 0 448 338 -UNLOADMEDIA "ZHOMovie"
  110. moviematosclic,0 432 322 448 338 NEXTPAGE "ZMAMovie",0 416 322 432 338 PREVPAGE "ZMAMovie",0 0 0 448 338 -UNLOADMEDIA "ZMAMovie"
  111. moviefoclic,0 432 322 448 338 NEXTPAGE "ZFOMovie",0 416 322 432 338 PREVPAGE "ZFOMovie",0 0 0 448 338 -UNLOADMEDIA "ZFOMovie"
  112. movieecclic,0 432 322 448 338 NEXTPAGE "ZECMovie",0 416 322 432 338 PREVPAGE "ZECMovie",0 0 0 448 338 -UNLOADMEDIA "ZECMovie"
  113. moviestclic,0 432 322 448 338 NEXTPAGE "ZSTMovie",0 416 322 432 338 PREVPAGE "ZSTMovie",0 306 219 336 249 LOADBIGSTRAT "ZSTMovie",0 0 0 448 338 -UNLOADMEDIA "ZSTMovie"
  114. movieavapclic,0 -640 -480 640 480 -UNLOADMEDIA "ZUEMovie ZZAVAP"
  115. --
  116. MouseInAllerA,0 0 0 640 480 SETCURSOR "wait" DOFUNCTION "marqueretour" LOADUE "ZUEMovie" DOFUNCTION "gotheatre"
  117. --
  118. MouseInDate,0 0 0 640 480 SETMEDIACOMPORT "VisuAnnees MouseInDate2" SETMEDIACOMPORT "VisuMois MouseInDate2" EDITDATE ""
  119. MouseInDate2,0 0 0 640 480 ENTERDATE ""
  120. --
  121. clicinminiHP,0 0 0 100 20 SETPANOPOS "PanoTh 0 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 126 410" FEEDBACKPANOTH "PanoTh 0"
  122. clicinminiPL,0 0 0 100 20 SETPANOPOS "PanoTh 0 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 126 410" FEEDBACKPANOTH "PanoTh 1"
  123. clicinminiQS,0 0 0 100 20 SETPANOPOS "PanoTh 0 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 126 410" FEEDBACKPANOTH "PanoTh 2"
  124. clicinminiUE,0 0 0 100 20 SETPANOPOS "PanoTh 670 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 250 410" FEEDBACKPANOTH "PanoTh 3"
  125. clicinminiBI,0 0 0 100 20 SETPANOPOS "PanoTh 670 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 250 410" FEEDBACKPANOTH "PanoTh 4"
  126. clicinminiAV,0 0 0 100 20 SETPANOPOS "PanoTh 670 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 250 410" FEEDBACKPANOTH "PanoTh 5"
  127. clicinminiAP,0 0 0 100 20 SETPANOPOS "PanoTh 670 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 250 410" FEEDBACKPANOTH "PanoTh 6"
  128. clicinminiCA,0 0 0 100 20 SETPANOPOS "PanoTh 1384 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 380 410" FEEDBACKPANOTH "PanoTh 7"
  129. clicinminiMA,0 0 0 100 20 SETPANOPOS "PanoTh 1384 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 380 410" FEEDBACKPANOTH "PanoTh 8"
  130. clicinminiUM,0 0 0 100 20 SETPANOPOS "PanoTh 1384 0" DRAW "PanoTh" SETMEDIALOC "ZTSfocus 380 410" FEEDBACKPANOTH "PanoTh 9"
  131. --
  132. clicinaide,0 49 444 179 460 DOFUNCTION "closeaide",0 329 444 460 460 PREVAIDE "ZzzzAIDE" DRAW "ZzzzAIDE",0 462 444 592 460 NEXTAIDE "ZzzzAIDE" DRAW "ZzzzAIDE",0 0 0 640 480 DOFUNCTION ""
  133. fbaide,0 0 0 640 480 DOFUNCTION ""
  134. mdownaide,0 49 444 179 460 SETMOVIEFRAME "ZzzzAIDE 300" DRAW "ZzzzAIDE",0 329 444 460 460 SETMOVIEFRAME "ZzzzAIDE 600" DRAW "ZzzzAIDE",0 462 444 592 460 SETMOVIEFRAME "ZzzzAIDE 900" DRAW "ZzzzAIDE"
  135. --
  136. mdownfondhist,0 0 0 640 480 DOFUNCTION ""
  137. mrepfondhist,0 0 0 640 480 DOFUNCTION ""
  138. fbfondhist,0 0 0 640 480 DOFUNCTION ""
  139. afbfondhist,0 0 0 640 480 DOFUNCTION ""
  140. --
  141. mupfondhist,0 0 10 65 34 SENDSWITCHMSG "quit",0 65 10 115 34 STOPALLMOVIE "" OPENRECHERCHE "",0 243 10 307 34 STOPALLMOVIE "" SENDSWITCHMSG "switch",0 55 424 112 452 DOFUNCTION "voirhist",0 242 424 354 452 UNLOADMEDIA "ZZFondHist" DOFUNCTION "goparhist",0 358 424 484 452 UNLOADMEDIA "ZZFondTemp" DOFUNCTION "gopartemp",0 8 426 56 453 DOFUNCTION "finparcours",0 366 10 430 34 DOFUNCTION "openaide"
  142. mupfondtemp,0 0 10 65 34 SENDSWITCHMSG "quit",0 65 10 115 34 STOPALLMOVIE "" OPENRECHERCHE "",0 243 10 307 34 STOPALLMOVIE "" SENDSWITCHMSG "switch",0 55 424 112 452 DOFUNCTION "voirlistetemp",0 242 424 354 452 UNLOADMEDIA "ZZFondHist" DOFUNCTION "goparhist",0 358 424 484 452 UNLOADMEDIA "ZZFondTemp" DOFUNCTION "gopartemp",0 8 426 56 453 DOFUNCTION "finparcours",0 366 10 430 34 DOFUNCTION "openaide",0 10 366 80 406 SETLISTPOS "ZZListeTemp 0018",0 150 366 212 406 SETLISTPOS "ZZListeTemp 2133",0 254 366 310 406 SETLISTPOS "ZZListeTemp 0139",0 333 366 386 406 SETLISTPOS "ZZListeTemp 0140",0 400 366 452 406 SETLISTPOS "ZZListeTemp 0141",0 474 366 509 406 SETLISTPOS "ZZListeTemp 0142",0 515 366 546 406 SETLISTPOS "ZZListeTemp 0143",0 551 366 584 406 SETLISTPOS "ZZListeTemp 0144",0 590 366 620 406 SETLISTPOS "ZZListeTemp 0145",0 3 44 109 94 DOFUNCTION "choixafrique",0 114 44 194 94 DOFUNCTION "choixasie",0 200 44 316 94 DOFUNCTION "choixee",0 322 42 442 94 DOFUNCTION "choixam",0 445 44 564 94 DOFUNCTION "choixew",0 573 33 637 108 DOFUNCTION "choixmonde"
  143. ---
  144. FeedBParcours,0 0 10 65 34 SHOWTEMP "ZFBQuitter",0 65 10 115 34 SHOWTEMP "ZFBRecherches",0 243 10 307 34 SHOWTEMP "ZFBScenario",0 308 10 365 34 SHOWTEMP "ZFBParcours",0 366 10 430 34 SHOWTEMP "ZFBAide",0 55 424 112 452 SHOWTEMP "ZFBVoir",0 242 424 354 452 SHOWTEMP "ZFBParEff",0 358 424 484 452 SHOWTEMP "ZFBParTemp",0 8 426 56 453 SHOWTEMP "ZFBFermer"
  145. --
  146. dblclickltemp,0 0 0 640 480 DOFUNCTION "voirlistetemp"
  147. dblclicklhist,0 0 0 640 480 SETCURSOR "wait" ABORTIFNIL "TitreTh" CHOIXLISTEHIST "ZZListeHist" DOFUNCTION "unloadmediath" DOFUNCTION "gothavap" DOFUNCTION "hideparcours" DOFUNCTION "finparcours",0 0 0 640 480 CHOIXLISTEHIST "ZZListeHist" DOFUNCTION "gdhallversth" DOFUNCTION "gothavap" DOFUNCTION "finparcours",0 0 0 640 480 DOFUNCTION "bip"
  148. -- descriptifs des éléments d'interface:
  149. -- NOM, folder, media,loc,visible/invisible, typemedia,comportement mouseUP,comportement repeatmouseDOWN,FeedBack,AntiFeedBack,CallBack,On open,comport mousedown,comport doubleclick
  150. MEDIAS
  151. -- les feedbacks
  152. FBBRNEXT,INTF,FBRNEXT1.pic,493 452,visible transparent,PICT
  153. FBBRPREV,INTF,FBRPREV1.pic,129 418,visible transparent,PICT
  154. ZZZFBAF,INTF,FBAF1.pic,8 48,,PICT,
  155. ZZZFBAS,INTF,FBAS1.pic,117 48,,PICT,
  156. ZZZFBEE,INTF,FBEE1.pic,201 48,,PICT,
  157. ZZZFBAM,INTF,FBAM1.pic,324 48,,PICT,
  158. ZZZFBEW,INTF,FBEW1.pic,449 48,,PICT,
  159. ZZZFBMO,INTF,FBMO1.pic,575 32,visible,PICT,
  160. ZFBSommaire,INTF,FEEDB1.pic,77 469,,PICT,
  161. ZFBRetour,INTF,FEEDB1.pic,15 469,,PICT,
  162. ZFBQuitter,INTF,FEEDB1.pic,9 25,,PICT,
  163. ZFBRecherches,INTF,FEEDB1.pic,72 25,,PICT,
  164. ZFBScenario,INTF,FEEDB1.pic,243 25,,PICT,
  165. ZFBParcours,INTF,FEEDB1.pic,308 25,,PICT,
  166. ZFBAide,INTF,FEEDB1.pic,366 25,,PICT,
  167. ZFBParEff,INTF,FEEDB1.pic,278 442,,PICT,
  168. ZFBParTemp,INTF,FEEDB1.pic,410 442,,PICT,
  169. ZFBVoir,INTF,FEEDB1.pic,68 442,,PICT,
  170. ZFBFermer,INTF,FEEDB1.pic,14 442,,PICT,
  171. -- medias du bandeau supérieur gd hall
  172. Beep,INTF,BIP1.MOV,0 0,visible,MOV
  173. SONGDHALL,INTF,PA001.MOV,0 0,visible,MOV,,,,,SETMOVIEFRAME "SONGDHALL 0" PLAYMOVIE "SONGDHALL" ACTIVCALLBACK "SONGDHALL",PLAYMOVIE "SONGDHALL" ACTIVCALLBACK "SONGDHALL"
  174. BarreDates,INTF,BanHa011.pic,0 0,visible,PICT,MouseInBDates,,,,,,FeedBBDates
  175. ZoneDates,INTF,ZDates1.pic,116 0 243 60,visible transparent,ZONE,,,FBZDate,AFBZDate
  176. MarqueGdHall,INTF,marqueur,0 0 0 60,visible transparent,ZONE,
  177. VisuAnnees,INTF,Per011.mov,155 2,visible,MOV,
  178. VisuMois,INTF,Per021.mov,146 29,visible,MOV,
  179. YearPrev,INTF,FlSup011.pic,138 6,invisible,PICT,,CYearPrev,
  180. YearNext,INTF,FlInf011.pic,208 6,invisible,PICT,,CYearNext,
  181. MonthPrev,INTF,FlSup011.pic,128 30,invisible,PICT,,CMonthPrev,
  182. MonthNext,INTF,FlInf011.pic,220 30,invisible,PICT,,CMonthNext,
  183. -- medias du scroller gd hall
  184. BarBas,INTF,Scr001.pic,0 395,visible,PICT,MouseinBarBas,,,,,,FeedBBarBas
  185. Focus,INTF,SCFOC1.pic,127 410,invisible transparent,PICT,,
  186. -- Gd Hall
  187. GdHall,INTF,PanPA00,0 67 640 395,visible,PANO,MouseInGdHall,,,,,,
  188. --
  189. -- Les éléments pour le Kiosque
  190. KioskCache,INTF,CACHE1.pic,0 67,visible,PICT
  191. KioskFond,INTF,KK1.pic,423 0,visible transparent,PICT,,MInToitKiosk,
  192. KioskPano,INTF,ColMors1.pic,470 67 604 384,visible,KIOS,MouseInKiosk,
  193. ZSeqMovie,MEDIA:SE,,8 59,visible,MOV,MInSequence,,,,DOFUNCTION "clicinseq",ACTIVCALLBACK "ZSeqMovie"
  194. --
  195. -- Les éléments spécifiques pour Histoires Parallèles
  196. --
  197. HistFond,INTF,CinFond1.pic,327 -1,visible transparent,PICT,MInFondCine,
  198. HistPar,INTF,QTCINE1.mov,326 53,visible,CINE,MouseInCine,
  199. HistCine,INTF,CinEcr1.pic,1 80,visible transparent,PICT,
  200. UHPMovie,MEDIA:HP,,4 91,visible,MOV,MouseInHP,,,,DOFUNCTION "clicinhp",ACTIVCALLBACK "UHPMovie"
  201. --
  202. ZAttenteActu,INTF,ANIMACT1.mov,112 123,visible,MOV,MouseInAttente,,,,SETMOVIEFRAME "ZAttenteActu 0" ACTIVCALLBACK "ZAttenteActu" PLAYMOVIE "ZAttenteActu"
  203. MovieActu,,,112 123,visible,MOV,MouseInActu,,,,DOFUNCTION "idleractu",SHOWMEDIA "BarBas Focus"
  204. IdlerActu,,,0 0 0 0,visible,IDLR,,,,,DOFUNCTION "enchaineactu"
  205. Terre,INTF,TERRE1.mov,392 148,visible,MOV,MouseInTerre,,,,SETCURSOR "wait" DOFUNCTION "attenteactus" SETMOVIEEND "Terre -1"
  206. -- les éléments du Browser GdHall
  207. Browser,INTF,Bro001.pic,0 395,visible,PICT,MInFuncsBr,,,,,,FBBr
  208. Vign1,,,148 412,visible,MOV,MouseInVign1,,FBVign1,AFBVign1
  209. Vign2,,,236 412,visible,MOV,MouseInVign2,,FBVign2,AFBVign2
  210. Vign3,,,324 412,visible,MOV,MouseInVign3,,FBVign3,AFBVign3
  211. Vign4,,,412 412,visible,MOV,MouseInVign4,,FBVign4,AFBVign4
  212. VueFocus,INTF,BRFOC1.pic,146 410,invisible transparent,PICT,,
  213. ZBrowserNext,INTF,BRNEXT1.pic,493 452,visible transparent,PICT,MInBrNext,,,,,,FBBRNEXT
  214. ZBrowserPrev,INTF,BRPREV1.pic,129 418,visible transparent,PICT,MInBrPrev,,,,,,FBBRPREV
  215. TitreVignettes,INTF,TVIGNS1.mov,151 396,visible,MOV
  216. --
  217. PanoFlDroite,INTF,FLDRON1.pic,612 48,,PICT,,MInFlDroite
  218. PanoFlGauche,INTF,FLGAON1.pic,0 48,,PICT,,MInFlGauche
  219. YFondArchives,INTF,FONDARC1.pic,156 67,visible transparent,PICT
  220. FBPanorama,INTF,PANOFB1.pic,26 414,,PICT
  221. -- Les éléments du théâtre d'opérations
  222. PanoTh,,,0 67 640 395,visible,PATH,MouseInZoneOp,,,,,,
  223. TitreBrowser,INTF,TBROWS1.mov,151 396,,MOV
  224. TitreTh,INTF,titre1.mov,32 46,visible,MOV
  225. ZTSfocus,INTF,SCFOC1.pic,250 410,visible transparent,PICT,,
  226. TScroller,,,0 395,visible,PICT,MouseInTScroll,,,,,,FeedBBarBas
  227. TBrowser,INTF,BroTH1.pic,0 395,visible,PICT,MInFuncsBrTh,,,,,,FBBrTh
  228. TBrowserNext,INTF,BRNEXT1.pic,493 454,visible transparent,PICT,MInTBrNext,,,,,,FBBRNEXT
  229. TBrowserPrev,INTF,BRPREV1.pic,129 420,visible transparent,PICT,MInTBrPrev,,,,,,FBBRPREV
  230. TVign1,,,148 412,visible,MOV,MouseInTVign1,,FBTVign1,AFBTVign1
  231. TVign2,,,236 412,visible,MOV,MouseInTVign2,,FBTVign2,AFBTVign2
  232. TVign3,,,324 412,visible,MOV,MouseInTVign3,,FBTVign3,AFBTVign3
  233. TVign4,,,412 412,visible,MOV,MouseInTVign4,,FBTVign4,AFBTVign4
  234. TVueFocus,INTF,BRFOC1.pic,146 410,invisible transparent,PICT,MInThFocus,
  235. UEMovie,,,320 227,visible centered modal,IMOV,MInUEMoviePlay,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  236. UEFond,INTF,FONDUE1.pic,0 67,visible modal,PICT,clicinfondue
  237. ZHOMovie,,,320 227,visible centered modal,MOV,moviebioclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  238. ZMAMovie,,,320 227,visible centered modal,MOV,moviematosclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  239. ZFOMovie,,,320 227,visible centered modal,MOV,moviefoclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  240. ZSTMovie,,,320 227,visible centered modal,MOV,moviestclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  241. ZCAMovie,,,320 227,visible centered modal,QCAR,moviecaclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" PLAYMOVIE "ZCAMovie" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  242. ZCAIMovie,,,320 227,visible centered modal,MOV,moviecaiclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" PLAYMOVIE "ZCAIMovie" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  243. ZECMovie,,,320 227,visible centered modal,MOV,movieecclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  244. ZHPMovie,,,320 227,visible centered modal,MOV,moviehpclic,,,,,DISABLECURSOR "PanoTh" PANOBORDSIZE "PanoTh 0" LOADMEDIA "YFondArchives" PLAYMOVIE "ZHPMovie" HIDEMEDIA "PanoFlDroite PanoFlGauche"
  245. ZUEMovie,,,320 227,visible centered modal,MOV,movieavapclic,,,,,SETCURSOR "wait" DOFUNCTION "marqueretour" LOADUE "ZUEMovie" UNLOADMEDIA "ZUEMovie" DOFUNCTION "gothavap"
  246. SON,INTF,,0 0,visible,MOV,,,,,SETMOVIEFRAME "SON 0" PLAYMOVIE "SON" ACTIVCALLBACK "SON",PLAYMOVIE "SON" ACTIVCALLBACK "SON"
  247. ZMiniTitreHP,INTF,MTHP1.PIC,142 419,,PICT,clicinminiHP
  248. ZMiniTitrePL,INTF,MTPL1.PIC,182 438,,PICT,clicinminiPL
  249. ZMiniTitreQS,INTF,MTQS1.PIC,211 456,,PICT,clicinminiQS
  250. ZMiniTitreUE,INTF,MTUE1.PIC,277 436,,PICT,clicinminiUE
  251. ZMiniTitreBI,INTF,MTBI1.PIC,296 454,,PICT,clicinminiBI
  252. ZMiniTitreAV,INTF,MTAV1.PIC,280 420,,PICT,clicinminiAV
  253. ZMiniTitreAP,INTF,MTAP1.PIC,333 420,,PICT,clicinminiAP
  254. ZMiniTitreCA,INTF,MTCA1.PIC,445 419,,PICT,clicinminiCA
  255. ZMiniTitreMA,INTF,MTMA1.PIC,432 438,,PICT,clicinminiMA
  256. ZMiniTitreUM,INTF,MTUM1.PIC,388 457,,PICT,clicinminiUM
  257. ZTerreBtn,INTF,AIL01.pic,520 416,,PICT,MInTerreBtn
  258. ZKioskBtn,INTF,MOR01.pic,580 405,,PICT,MInKioskBtn
  259. ZCineBtn,INTF,CINE01.pic,576 411,,PICT,MInCineBtn
  260. ZTerreBtn2,INTF,AIL02.pic,520 416,visible,PICT,
  261. ZKioskBtn2,INTF,MOR02.pic,580 405,visible,PICT,
  262. ZCineBtn2,INTF,CINE02.pic,576 411,visible,PICT,
  263. ZzzzAIDE,MEDIA:AD:AD01,,0 0,visible,QAID,clicinaide,,fbaide,,,,mdownaide
  264. --
  265. INTRO,INTF,INTROD1.mov,0 0,visible,MOV,minintro,,,,DOFUNCTION "finintro",PLAYMOVIE "INTRO"
  266. GENERIQUE,INTF,GNRQ1.mov,0 0,visible,MOV,mingenerique,,,,DOQUITTER "",PLAYMOVIE "GENERIQUE" ACTIVCALLBACK "GENERIQUE"
  267. EcranOblige,INTF,CHARG1.pic,0 0,visible,PICT,
  268. IdlerSwitcher,,,0 0 0 0,visible,IDLR,,,,,ABORTIFNOTNIL "GENERIQUE" DOFUNCTION "introduction",ACTIVCALLBACK "IdlerSwitcher"
  269. --
  270. ZZListeHist,INTF,,57 59 583 349,,UELIST,,,,,,,,dblclicklhist
  271. ZZFondHist,INTF,PAREFF1.pic,0 0 640 480,,PICT,mupfondhist,,,,,,FeedBParcours
  272. --
  273. ZZListeTemp,INTF,0,57 117 583 355,,PERLIST,,,,,,,,dblclickltemp
  274. ZZFondTemp,INTF,PARTEMP1.pic,0 0 640 480,,PICT,mupfondtemp,,,,,,FeedBParcours
  275. ZZThermTemp,,0,174 459 503 473,,THRM
  276. --
  277. FUNCTIONS
  278. --
  279. FinUEAVAP
  280. LOADMEDIA "ZZAVAP"
  281. end
  282. --
  283. ThModeScroller
  284. ABORTIFNIL "TitreTh"
  285. SETCURSOR "wait" 
  286. UNLOADMEDIA "ZTerreBtn2 ZCineBtn2 ZKioskBtn2"
  287. UNLOADMEDIA "UEMovie UEFond ZHOMovie ZCAMovie ZCAIMovie ZFOMovie ZHPMovie YFondArchives ZMAMovie ZECMovie ZUEMovie ZSTMovie ZZAVAP"
  288. UNLOADMEDIA "TBrowser TBrowserNext TBrowserPrev TVign1 TVign2 TVign3 TVign4 TVueFocus"
  289. HIDEMEDIA "TitreBrowser"
  290. HIDEMEDIA "TitreVignettes Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  291. SHOWTHSCRELEM "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  292. LOADMEDIA "PanoTh"
  293. LOADMEDIA "TScroller ZTSfocus"
  294. PANOBORDSIZE "PanoTh 32"
  295. SHOWMEDIA "PanoFlDroite PanoFlGauche"
  296. ENABLECURSOR "PanoTh"
  297. FEEDBACKPANOTH "PanoTh -1 "
  298. SETMEDIACOMPORT "PanoTh MouseInZoneOp"
  299. LOADMEDIA "SON" 
  300. end
  301. --
  302. ThModeBrowser
  303. SETCURSOR "wait" 
  304. LOADMEDIA "TBrowser TBrowserNext TBrowserPrev TVign1 TVign2 TVign3 TVign4 TVueFocus"
  305. SHOWMEDIA "TitreBrowser"
  306. HIDEMEDIA "TVueFocus"
  307. HIDEMEDIA "TitreVignettes Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  308. HIDEMEDIA "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  309. UNLOADMEDIA "TScroller ZTSfocus"
  310. PANOBORDSIZE "PanoTh 0"
  311. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  312. --DISABLECURSOR "PanoTh"
  313. UNLOADMEDIA "SON"
  314. SETMEDIACOMPORT "PanoTh MouseInZoneOp2" 
  315. end
  316. --
  317. ThModeBrowsUE
  318. SETCURSOR "wait" 
  319. UNLOADMEDIA "TBrowser TBrowserNext TBrowserPrev TVign1 TVign2 TVign3 TVign4 TVueFocus"
  320. HIDEMEDIA "TitreBrowser"
  321. LOADMEDIA "TitreVignettes"
  322. LOADMEDIA "TBrowser ZBrowserNext ZBrowserPrev"
  323. SHOWMEDIA "TitreVignettes TBrowser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  324. HIDEMEDIA "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  325. DOFUNCTION "showuebrowser"
  326. UNLOADMEDIA "TScroller ZTSfocus"
  327. PANOBORDSIZE "PanoTh 0"
  328. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  329. --DISABLECURSOR "PanoTh"
  330. UNLOADMEDIA "SON"
  331. SETMEDIACOMPORT "PanoTh MouseInZoneOp2" 
  332. end
  333. --
  334. clicinseq
  335. ABORTIFNOTNIL "Vign1"
  336. STOPMOVIE "ZSeqMovie"
  337. LOADVIGNUE "seq"
  338. HIDEMEDIA "VueFocus TVueFocus"
  339. DOFUNCTION "loadbrowsue"
  340. end
  341. --
  342. showuebrowser
  343. LOADMEDIA "TitreVignettes"
  344. SHOWMEDIA "TitreVignettes Browser Vign1 Vign2 Vign3 Vign4"
  345. HIDEMEDIA "VueFocus"
  346. AFFICHBRPREVNEXT ""
  347. --DRAW "Browser"
  348. end
  349. --
  350. hideuebrowser
  351. HIDEMEDIA "TitreVignettes Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  352. end
  353. --
  354. unloadtheatre
  355. UNLOADTBROWS ""
  356. UNLOADTSCROLL ""
  357. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  358. UNLOADMEDIA "TitreBrowser"
  359. HIDEMEDIA "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  360. UNLOADMEDIA "SON UEMovie UEFond PanoTh TitreTh ZHOMovie ZCAMovie ZCAIMovie ZSTMovie ZFOMovie ZHPMovie YFondArchives ZMAMovie ZECMovie ZUEMovie ZZAVAP"
  361. UNLOADMEDIA "ZTerreBtn ZKioskBtn ZCineBtn ZTerreBtn2 ZKioskBtn2 ZCineBtn2"
  362. HIDEMEDIA "ZTerreBtn ZKioskBtn ZCineBtn"
  363. end
  364. --
  365. loadeleminth
  366. DOFUNCTION "unloadtscroll"
  367. UNLOADMEDIA "UEMovie UEFond"
  368. SHOWMEDIA "TitreBrowser"
  369. end
  370. --
  371. retourkiosk
  372. ABORTIFNIL "KioskPano"
  373. LOADMEDIA "BarBas Focus"
  374. SHOWMEDIA "BarBas Focus"
  375. ENTERDATE "kiosk"
  376. end
  377. --
  378. retourcine
  379. ABORTIFNIL "HistFond"
  380. LOADMEDIA "BarBas Focus"
  381. SHOWMEDIA "BarBas Focus"
  382. ENTERDATE "cine"
  383. end
  384. --    cette fonction assure la présence de la barre du bas dans le Gd Hall
  385. assurebarbas
  386. ABORTIFNIL "GdHall"
  387. ABORTIFNOTNIL "MovieActu"
  388. ABORTIFNOTNIL "KioskPano"
  389. ABORTIFNOTNIL "HistFond"
  390. LOADMEDIA "BarBas Focus"
  391. SHOWMEDIA "BarBas Focus"
  392. end
  393. --
  394. retoursommaire
  395. SETCURSOR "wait" 
  396. UNLOADMEDIA "MarqueGdHall"
  397. DOFUNCTION "unloadtheatre"
  398. DOFUNCTION "hideuebrowser"
  399. EXPANDMEDIA "GdHall BarBas Focus KioskFond KioskPano HistFond HistPar HistCine Terre MovieActu IdlerActu"
  400. SETMOVIEFRAME "Terre 2300"
  401. SETTERRE ""
  402. DOFUNCTION "retourkiosk"
  403. DOFUNCTION "retourcine"
  404. DOFUNCTION "assurebarbas"
  405. ABORTIFNIL "MovieActu"
  406. UNLOADMEDIA "MovieActu"
  407. DOFUNCTION "demarreactus"
  408. SETMOVIEEND "Terre -1"
  409. DRAW "All"
  410. SUPPRIMECLICS "" 
  411. end
  412. --
  413. fermegdhall
  414. SHRINKMEDIA "GdHall BarBas Focus KioskPano KioskFond HistFond HistPar HistCine Terre MovieActu IdlerActu"
  415. UNLOADMEDIA "ZSeqMovie UHPMovie SONGDHALL KioskCache ZAttenteActu"
  416. end
  417. --
  418. testifkiosk
  419. ABORTIFNIL "GdHall"
  420. UNLOADMEDIA "ZKioskBtn"
  421. HIDEMEDIA "ZKioskBtn"
  422. ABORTIFNIL "KioskPano"
  423. LOADMEDIA "ZKioskBtn"
  424. SHOWMEDIA "ZKioskBtn"
  425. end
  426. --
  427. testifcine
  428. ABORTIFNIL "GdHall"
  429. UNLOADMEDIA "ZCineBtn"
  430. HIDEMEDIA "ZCineBtn"
  431. ABORTIFNIL "HistCine"
  432. LOADMEDIA "ZCineBtn"
  433. SHOWMEDIA "ZCineBtn"
  434. end
  435. --
  436. retourdansth
  437. SETCURSOR "wait"
  438. ABORTIFNIL "TitreTh"
  439. DEPILEANDGO "1"
  440. DOFUNCTION "unloadmediath"
  441. DOFUNCTION "gothavap"
  442. SETCURSOR 128
  443. end
  444. --
  445. retourdansgh
  446. SETCURSOR "wait"
  447. ABORTIFNIL "GdHall"
  448. DEPILEANDGO "0"
  449. DOFUNCTION "gdhallversth"
  450. DOFUNCTION "gothavap"
  451. SETCURSOR 128
  452. end
  453. --
  454. faireretour
  455. DOFUNCTION "retourdansth"
  456. DOFUNCTION "retourdansgh"
  457. end
  458. --
  459. marqueretour
  460. UNLOADMEDIA "MarqueGdHall"
  461. ABORTIFNIL "GdHall"
  462. --LOADMEDIA "MarqueGdHall"
  463. end
  464. --
  465. gdhallversth
  466. DOFUNCTION "marqueretour"
  467. DOFUNCTION "testifkiosk"
  468. DOFUNCTION "testifcine"
  469. DOFUNCTION "fermegdhall"
  470. end
  471. --
  472. unloadmovieth
  473. UNLOADMEDIA "SON UEMovie UEFond ZHOMovie ZCAMovie ZCAIMovie ZSTMovie ZFOMovie ZHPMovie YFondArchives ZMAMovie ZECMovie ZUEMovie ZZAVAP"
  474. end
  475. --
  476. unloadmediath
  477. UNLOADMEDIA "SON UEMovie UEFond PanoTh ZHOMovie ZCAMovie ZCAIMovie ZSTMovie ZFOMovie ZHPMovie YFondArchives ZMAMovie ZECMovie ZUEMovie ZZAVAP"
  478. end
  479. --
  480. gotheatre
  481. LOADMEDIA "TitreTh TScroller TitreBrowser"
  482. LOADMEDIA "ZTerreBtn"
  483. SHOWMEDIA "ZTerreBtn"
  484. SETMEDIALOC "ZTSfocus 250 410"
  485. SETMEDIACOMPORT "UEMovie MInUEMoviePlay"
  486. --DRAW "All"
  487. --PAUSE "240"
  488. DOFUNCTION "ThModeBrowsUE"
  489. LOADMEDIA "UEMovie UEFond"
  490. ACTIVCALLBACK "UEMovie"
  491. PLAYMOVIE "UEMovie"
  492. SUPPRIMECLICS ""
  493. end
  494. --
  495. gothfromoutil
  496. DOFUNCTION "finparcours"
  497. LOADVIGNUE "date"
  498. HIDEMEDIA "VueFocus TVueFocus"
  499. LOADMEDIA "TitreTh TScroller TitreBrowser"
  500. LOADMEDIA "ZTerreBtn"
  501. SHOWMEDIA "ZTerreBtn"
  502. LOADMEDIA "TBrowser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  503. SETMEDIALOC "ZTSfocus 250 410"
  504. SETMEDIACOMPORT "UEMovie MInUEMoviePlay"
  505. DOFUNCTION "ThModeBrowsUE"
  506. LOADMEDIA "UEMovie UEFond"
  507. GOLASTFRAME "UEMovie"
  508. SUPPRIMECLICS ""
  509. end
  510. --
  511. gothavap
  512. LOADMEDIA "TitreTh TScroller TitreBrowser"
  513. LOADMEDIA "ZTerreBtn"
  514. SHOWMEDIA "ZTerreBtn"
  515. SETMEDIALOC "ZTSfocus 250 410"
  516. SETMEDIACOMPORT "UEMovie MInUEMoviePlay"
  517. LOADVIGNUE "date"
  518. HIDEMEDIA "VueFocus TVueFocus"
  519. --DRAW "All"
  520. --PAUSE "240"
  521. DOFUNCTION "ThModeBrowsUE"
  522. LOADMEDIA "UEMovie UEFond"
  523. ACTIVCALLBACK "UEMovie"
  524. PLAYMOVIE "UEMovie"
  525. SUPPRIMECLICS ""
  526. end
  527. --
  528. clicactualites
  529. STOPMOVIE "MovieActu"
  530. SETCURSOR "wait"
  531. LOADVIGNUE "date"
  532. HIDEMEDIA "VueFocus TVueFocus"
  533. DOFUNCTION "loadbrowsue"
  534. LOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  535. end
  536. --
  537. clicterre
  538. STOPMOVIE "MovieActu"
  539. SETMOVIEEND "IdlerActu 10"
  540. LOADMEDIA "IdlerActu"
  541. ACTIVCALLBACK "IdlerActu"
  542. ABORTIFNOTNIL "Vign1"
  543. LOADVIGNUE "date"
  544. HIDEMEDIA "VueFocus TVueFocus"
  545. DOFUNCTION "loadbrowsue"
  546. LOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  547. end
  548. --
  549. demarreactus
  550. SETCURSOR "wait"
  551. UNLOADMEDIA "IdlerActu"
  552. LOADBANDEACT "MovieActu"
  553. PLAYMOVIE "MovieActu"
  554. ACTIVCALLBACK "MovieActu"
  555. UNLOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  556. SETTERRE ""
  557. --DOFUNCTION "loadbrowsue"
  558. SUPPRIMECLICS ""
  559. end
  560. --
  561. attenteactus
  562. ABORTIFNOTNIL "MovieActu"
  563. LOADMEDIA "ZAttenteActu"
  564. SHOWMEDIA "ZAttenteActu"
  565. DRAW "ZAttenteActu"
  566. ACTIVCALLBACK "ZAttenteActu"
  567. PLAYMOVIE "ZAttenteActu"
  568. end
  569. --
  570. idleractu
  571. SETCURSOR "wait"
  572. SETMOVIEEND "IdlerActu 10"
  573. LOADMEDIA "IdlerActu"
  574. ACTIVCALLBACK "IdlerActu"
  575. ABORTIFNOTNIL "Vign1"
  576. LOADVIGNUE "date"
  577. HIDEMEDIA "VueFocus TVueFocus"
  578. DOFUNCTION "loadbrowsue"
  579. --LOADVIGNUE "date"
  580. LOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  581. end
  582. --
  583. enchaineactu
  584. SETCURSOR "wait"
  585. UNLOADMEDIA "MovieActu IdlerActu ZAttenteActu"
  586. DOFUNCTION "hideuebrowser"
  587. SHOWMEDIA "BarBas Focuss"
  588. CHANGEMONTH "1"
  589. ENTERDATE ""
  590. LOADBANDEACT "MovieActu"
  591. PLAYMOVIE "MovieActu"
  592. ACTIVCALLBACK "MovieActu"
  593. UNLOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  594. SUPPRIMECLICS ""
  595. SETTERRE ""
  596. end
  597. --
  598. reloadactu
  599. ABORTIFNIL "MovieActu"
  600. SETCURSOR "wait"
  601. UNLOADMEDIA "MovieActu IdlerActu"
  602. UNLOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  603. LOADBANDEACT "MovieActu"
  604. PLAYMOVIE "MovieActu"
  605. ACTIVCALLBACK "MovieActu"
  606. SUPPRIMECLICS ""
  607. end
  608. --
  609. finactualites
  610. UNLOADMEDIA "MovieActu IdlerActu ZAttenteActu"
  611. CHANGEMONTH "1"
  612. ENTERDATE ""
  613. LOADBANDEACT "MovieActu"
  614. PLAYMOVIE "MovieActu"
  615. ACTIVCALLBACK "MovieActu"
  616. end
  617. --
  618. openkiosk
  619. SETCURSOR "wait"
  620. DOFUNCTION "closeall"
  621. UNLOADMEDIA "SONGDHALL"
  622. setpanopos "GdHall 1884 0"
  623. LOADMEDIA "KioskFond KioskPano"
  624. PANOBORDSIZE "GdHall 0"
  625. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  626. ENTERDATE "kiosk"
  627. end
  628. --
  629. openactu
  630. SETCURSOR "wait"
  631. DOFUNCTION "closeall"
  632. UNLOADMEDIA "SONGDHALL"
  633. setpanopos "GdHall 670 0"
  634. PANOBORDSIZE "GdHall 0"
  635. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  636. LOADMEDIA "Terre"
  637. SETMOVIEFRAME "Terre 2300"
  638. SETTERRE ""
  639. DOFUNCTION "demarreactus"
  640. end
  641. --
  642. openactufirst
  643. DOFUNCTION "closeall"
  644. UNLOADMEDIA "SONGDHALL"
  645. setpanopos "GdHall 670 0"
  646. PANOBORDSIZE "GdHall 0"
  647. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  648. LOADMEDIA "Terre"
  649. SETMOVIEEND "Terre 2300"
  650. PLAYMOVIE "Terre"
  651. ACTIVCALLBACK "Terre" 
  652. end
  653. --
  654. opencine
  655. SETCURSOR "wait"
  656. DOFUNCTION "closeall"
  657. UNLOADMEDIA "SONGDHALL"
  658. setpanopos "GdHall 1397 0"
  659. LOADMEDIA "HistFond HistCine HistPar"
  660. PANOBORDSIZE "GdHall 0"
  661. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  662. ENTERDATE "cine"
  663. end
  664. --
  665. clicinhp
  666. ABORTIFNOTNIL "Vign1"
  667. SETCURSOR "wait"
  668. STOPMOVIE "UHPMovie"
  669. LOADVIGNUE "hpar"
  670. HIDEMEDIA "VueFocus TVueFocus"
  671. DOFUNCTION "loadbrowsue"
  672. end
  673. --
  674. loadbrowsue
  675. SETCURSOR "wait"
  676. LOADMEDIA "Vign1 Vign2 Vign3 Vign4 TitreVignettes Browser ZBrowserNext ZBrowserPrev VueFocus"
  677. DOFUNCTION "showuebrowser"
  678. HIDEMEDIA "BarBas Focus"
  679. --SETMEDIALOC "VueFocus 146 410"
  680. HIDEMEDIA "VueFocus TVueFocus"
  681. PANOBORDSIZE "GdHall 0"
  682. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  683. end
  684. --
  685. unloadbrowsue
  686. UNLOADMEDIA "Browser TBrowser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  687. HIDEMEDIA "TitreVignettes Browser TBrowser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus"
  688. SHOWMEDIA "BarBas Focus"
  689. end
  690. --
  691. unloadtscroll
  692. HIDEMEDIA "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  693. UNLOADMEDIA "TScroller"
  694. UNLOADMEDIA "ZTSfocus"
  695. UNLOADMEDIA "SON"
  696. --DISABLECURSOR "PanoTh"
  697. end
  698. --
  699. showifalone
  700. ABORTIFNOTNIL "TVign2"
  701. LOADVIGNTH "TVign1"
  702. SETMEDIACOMPORT "PanoTh MouseInZoneOp2"
  703. end
  704. --
  705. closeall
  706. UNLOADMEDIA "KioskFond KioskPano KioskCache HistPar HistFond HistCine TitreVignettes Browser TBrowser Vign1 Vign2 Vign3 Vign4 ZBrowserNext ZBrowserPrev VueFocus MovieActu IdlerActu ZAttenteActu Terre UHPMovie ZSeqMovie"
  707. LOADMEDIA "BarBas Focus"
  708. SHOWMEDIA "BarBas Focus"
  709. PANOBORDSIZE "GdHall 48"
  710. SHOWMEDIA "PanoFlDroite PanoFlGauche"
  711. end
  712. --
  713. loadueth
  714. SETCURSOR "wait"
  715. LOADMEDIA "UEMovie UEFond"
  716. DOFUNCTION "ThModeBrowsUE"
  717. SETMEDIACOMPORT "UEMovie MInUEMoviePlay"
  718. PLAYMOVIE "UEMovie"
  719. end
  720. --
  721. loadhpth
  722. SETCURSOR "wait"
  723. DOFUNCTION "loadeleminth"
  724. LOADHPS ""
  725. SETMOVIEFRAME "TitreBrowser 1500"
  726. DOFUNCTION "showifalone"
  727. end
  728. --
  729. loadplth
  730. SETCURSOR "wait"
  731. DOFUNCTION "loadeleminth"
  732. LOADPLUMES ""
  733. SETMOVIEFRAME "TitreBrowser 2100"
  734. DOFUNCTION "showifalone"
  735. end
  736. --
  737. loadstth
  738. SETCURSOR "wait"
  739. DOFUNCTION "loadeleminth"
  740. LOADSTRATEGIES ""
  741. SETMOVIEFRAME "TitreBrowser 2400"
  742. DOFUNCTION "showifalone"
  743. end
  744. --
  745. loadbith
  746. SETCURSOR "wait"
  747. DOFUNCTION "loadeleminth"
  748. LOADBIOS ""
  749. SETMOVIEFRAME "TitreBrowser 600"
  750. DOFUNCTION "showifalone"
  751. end
  752. --
  753. loadavth
  754. SETCURSOR "wait"
  755. DOFUNCTION "loadeleminth"
  756. LOADAVANT ""
  757. SETMOVIEFRAME "TitreBrowser 0"
  758. end
  759. --
  760. loadapth
  761. SETCURSOR "wait"
  762. DOFUNCTION "loadeleminth"
  763. LOADAPRES ""
  764. SETMOVIEFRAME "TitreBrowser 300"
  765. end
  766. --
  767. loadcath
  768. SETCURSOR "wait"
  769. DOFUNCTION "loadeleminth"
  770. LOADCARTES ""
  771. SETMOVIEFRAME "TitreBrowser 900"
  772. DOFUNCTION "showifalone"
  773. end
  774. --
  775. loadmath
  776. SETCURSOR "wait"
  777. DOFUNCTION "loadeleminth"
  778. LOADMATOS ""
  779. SETMOVIEFRAME "TitreBrowser 1800"
  780. DOFUNCTION "showifalone"
  781. end
  782. --
  783. loadfoth
  784. SETCURSOR "wait"
  785. DOFUNCTION "loadeleminth"
  786. LOADFORCES ""
  787. SETMOVIEFRAME "TitreBrowser 1200"
  788. DOFUNCTION "showifalone"
  789. end
  790. --
  791. bip
  792. SETMOVIEFRAME "Beep 0"
  793. PLAYMOVIE "Beep"
  794. end
  795. --
  796. finintro
  797. GOLASTFRAME "INTRO"
  798. UNLOADMEDIA "INTRO"
  799. SHOWMEDIA "BarreDates VisuAnnees VisuMois ZoneDates BarBas GdHall Focus"
  800. PANOBORDSIZE "GdHall 48"
  801. PANOBORDSIZE "PanoTh 48"
  802. PANOBORDSIZE "KioskPano 32"
  803. SETPANOPOS "GdHall 670 0"
  804. SETMEDIALOC "Focus 128 410"
  805. SETCURRDATE "1800 3321 3909 4006 4106 4211 4112 4302 4406 4505 4508"
  806. DRAW "All"
  807. PANOPANOTO "GdHall 1884 0"
  808. PANOBORDSIZE "GdHall 0"
  809. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  810. LOADMEDIA "KioskFond KioskPano"
  811. HIDEMEDIA "PanoFlDroite PanoFlGauche"
  812. ENTERDATE "kiosk"
  813. SHOWMEDIA "Focus"
  814. SUPPRIMECLICS ""
  815. end
  816. --
  817. parcours
  818. STOPALLMOVIE ""
  819. CACHEMEDIA "All"
  820. DECOUVREMEDIA "ZFBParEff ZFBParTemp ZFBVoir ZFBFermer"
  821. end
  822. --
  823. unloadparcours
  824. HIDEMEDIA "ZZListeHist ZZFondHist ZZListeTemp ZZFondTemp ZZThermTemp ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  825. UNLOADMEDIA "ZZListeHist ZZFondHist ZZListeTemp ZZFondTemp ZZThermTemp ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  826. end
  827. --
  828. hideparcours
  829. HIDEMEDIA "ZZListeHist ZZFondHist ZZListeTemp ZZFondTemp ZZThermTemp ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  830. end
  831. --
  832. lhistajour
  833. ABORTIFNIL "ZZListeHist"
  834. UNLOADMEDIA "ZZListeHist"
  835. LOADMEDIA "ZZListeHist"
  836. end
  837. --
  838. gopartemp
  839. DOFUNCTION "parcours"
  840. DOFUNCTION "closeparhist"
  841. DECOUVREMEDIA "ZZListeTemp ZZFondTemp ZZThermTemp"
  842. DECOUVREMEDIA "ZFBSommaire ZFBRetour ZFBQuitter ZFBRecherches ZFBScenario ZFBParcours ZFBAide FBPanorama ZFBParEff ZFBParTemp ZFBVoir ZFBFermer"
  843. DECOUVREMEDIA "ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  844. LOADMEDIA "ZZFondTemp ZZThermTemp"
  845. SHOWMEDIA "ZZFondTemp ZZThermTemp"
  846. DOFUNCTION "choixprec"
  847. end
  848. --
  849. goparhist
  850. DOFUNCTION "parcours"
  851. DOFUNCTION "closepartemp"
  852. DOFUNCTION "lhistajour"
  853. LOADMEDIA "ZZFondHist"
  854. DECOUVREMEDIA "ZZFondHist"
  855. SHOWMEDIA "ZZFondHist"
  856. LOADMEDIA "ZZListeHist"
  857. DECOUVREMEDIA "ZZListeHist"
  858. DECOUVREMEDIA "ZFBSommaire ZFBRetour ZFBQuitter ZFBRecherches ZFBScenario ZFBParcours ZFBAide FBPanorama ZFBParEff ZFBParTemp ZFBVoir ZFBFermer"
  859. SHOWMEDIA "ZZListeHist"
  860. end
  861. --
  862. unloadfbparc
  863. UNLOADMEDIA "ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  864. end
  865. --
  866. choixdefaut
  867. ABORTIFNOTNIL "ZZListeTemp"
  868. LOADMEDIA "ZZZFBMO"
  869. end
  870. --
  871. choixprec
  872. DOFUNCTION "choixdefaut"
  873. LOADMEDIA "ZZListeTemp"
  874. SHOWMEDIA "ZZListeTemp"
  875. SHOWMEDIA "ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  876. end
  877. --
  878. choixafrique
  879. DOFUNCTION "unloadfbparc"
  880. SETLISTRGN "ZZListeTemp 5"
  881. SETMEDIANAME "ZZThermTemp 5"
  882. UNLOADMEDIA "ZZListeTemp"
  883. LOADMEDIA "ZZListeTemp"
  884. SHOWMEDIA "ZZListeTemp"
  885. LOADMEDIA "ZZZFBAF"
  886. SHOWMEDIA "ZZZFBAF"
  887. SETLISTPOS "ZZListeTemp currdate"
  888. end
  889. --
  890. choixasie
  891. DOFUNCTION "unloadfbparc"
  892. SETLISTRGN "ZZListeTemp 2"
  893. SETMEDIANAME "ZZThermTemp 2"
  894. UNLOADMEDIA "ZZListeTemp"
  895. LOADMEDIA "ZZListeTemp"
  896. SHOWMEDIA "ZZListeTemp"
  897. LOADMEDIA "ZZZFBAS"
  898. SHOWMEDIA "ZZZFBAS"
  899. SETLISTPOS "ZZListeTemp currdate"
  900. end
  901. --
  902. choixee
  903. DOFUNCTION "unloadfbparc"
  904. SETLISTRGN "ZZListeTemp 4"
  905. SETMEDIANAME "ZZThermTemp 4"
  906. UNLOADMEDIA "ZZListeTemp"
  907. LOADMEDIA "ZZListeTemp"
  908. SHOWMEDIA "ZZListeTemp"
  909. LOADMEDIA "ZZZFBEE"
  910. SHOWMEDIA "ZZZFBEE"
  911. SETLISTPOS "ZZListeTemp currdate"
  912. end
  913. --
  914. choixam
  915. DOFUNCTION "unloadfbparc"
  916. SETLISTRGN "ZZListeTemp 1"
  917. SETMEDIANAME "ZZThermTemp 1"
  918. UNLOADMEDIA "ZZListeTemp"
  919. LOADMEDIA "ZZListeTemp"
  920. SHOWMEDIA "ZZListeTemp"
  921. LOADMEDIA "ZZZFBAM"
  922. SHOWMEDIA "ZZZFBAM"
  923. SETLISTPOS "ZZListeTemp currdate"
  924. end
  925. --
  926. choixew
  927. DOFUNCTION "unloadfbparc"
  928. SETLISTRGN "ZZListeTemp 3"
  929. SETMEDIANAME "ZZThermTemp 3"
  930. UNLOADMEDIA "ZZListeTemp"
  931. LOADMEDIA "ZZListeTemp"
  932. SHOWMEDIA "ZZListeTemp"
  933. LOADMEDIA "ZZZFBEW"
  934. SHOWMEDIA "ZZZFBEW"
  935. SETLISTPOS "ZZListeTemp currdate"
  936. end
  937. --
  938. choixmonde
  939. DOFUNCTION "unloadfbparc"
  940. SETLISTRGN "ZZListeTemp 0"
  941. SETMEDIANAME "ZZThermTemp 0"
  942. UNLOADMEDIA "ZZListeTemp"
  943. LOADMEDIA "ZZListeTemp"
  944. SHOWMEDIA "ZZListeTemp"
  945. LOADMEDIA "ZZZFBMO"
  946. SHOWMEDIA "ZZZFBMO"
  947. SETLISTPOS "ZZListeTemp currdate"
  948. end
  949. --
  950. finparcours
  951. DOFUNCTION "closeparhist"
  952. DOFUNCTION "closepartemp"
  953. DECOUVREMEDIA "All"
  954. end
  955. --
  956. closeparhist
  957. UNLOADMEDIA "ZZFondHist"
  958. HIDEMEDIA "ZZListeHist"
  959. end
  960. --
  961. closepartemp
  962. UNLOADMEDIA "ZZFondTemp ZZThermTemp"
  963. HIDEMEDIA "ZZListeTemp"
  964. HIDEMEDIA "ZZZFBAM ZZZFBAF ZZZFBEE ZZZFBEW ZZZFBAS ZZZFBMO"
  965. end
  966. --
  967. vltifth
  968. ABORTIFNIL "TitreTh"
  969. CHOIXLISTEHIST "ZZListeTemp"
  970. DOFUNCTION "unloadmediath"
  971. DOFUNCTION "gothavap"
  972. DOFUNCTION "finparcours"
  973. end
  974. --
  975. vltifgdhall
  976. ABORTIFNIL "GdHall"
  977. CHOIXLISTEHIST "ZZListeTemp"
  978. DOFUNCTION "gdhallversth"
  979. DOFUNCTION "gothavap"
  980. DOFUNCTION "finparcours"
  981. end
  982. --
  983. trycloseparc
  984. DOFUNCTION "finparcours"
  985. end
  986. --
  987. voirlistetemp
  988. SETCURSOR "wait"
  989. DOFUNCTION "vltifth"
  990. DOFUNCTION "vltifgdhall"
  991. end
  992. --
  993. vlhifth
  994. ABORTIFNIL "TitreTh"
  995. CHOIXLISTEHIST "ZZListeHist"
  996. DOFUNCTION "unloadmediath"
  997. DOFUNCTION "gothavap"
  998. DOFUNCTION "finparcours"
  999. end
  1000. --
  1001. vlhifgdhall
  1002. ABORTIFNIL "GdHall"
  1003. CHOIXLISTEHIST "ZZListeHist"
  1004. DOFUNCTION "gdhallversth"
  1005. DOFUNCTION "gothavap"
  1006. DOFUNCTION "finparcours"
  1007. end
  1008. --
  1009. voirhist
  1010. SETCURSOR "wait"
  1011. DOFUNCTION "vlhifth"
  1012. DOFUNCTION "vlhifgdhall"
  1013. end
  1014. --
  1015. tryopenaide7
  1016. ABORTIFNIL "PanoTh"
  1017. OPENAIDE "ZzzzAIDE 7"
  1018. DECOUVREMEDIA "ZzzzAIDE"
  1019. end
  1020. --
  1021. tryopenaide6
  1022. ABORTIFNIL "UEFond"
  1023. OPENAIDE "ZzzzAIDE 6"
  1024. DECOUVREMEDIA "ZzzzAIDE"
  1025. end
  1026. --
  1027. tryopenaide5
  1028. ABORTIFNIL "ZZFondHist"
  1029. OPENAIDE "ZzzzAIDE 5"
  1030. DECOUVREMEDIA "ZzzzAIDE"
  1031. end
  1032. --
  1033. tryopenaide5b
  1034. ABORTIFNIL "ZZFondTemp"
  1035. OPENAIDE "ZzzzAIDE 5"
  1036. DECOUVREMEDIA "ZzzzAIDE"
  1037. end
  1038. --
  1039. tryopenaide4
  1040. ABORTIFNIL "PanoTh"
  1041. OPENAIDE "ZzzzAIDE 4"
  1042. DECOUVREMEDIA "ZzzzAIDE"
  1043. end
  1044. --
  1045. tryopenaide3
  1046. ABORTIFNIL "HistPar"
  1047. OPENAIDE "ZzzzAIDE 3"
  1048. DECOUVREMEDIA "ZzzzAIDE"
  1049. end
  1050. --
  1051. tryopenaide2
  1052. ABORTIFNIL "KioskPano"
  1053. OPENAIDE "ZzzzAIDE 2"
  1054. DECOUVREMEDIA "ZzzzAIDE"
  1055. end
  1056. --
  1057. tryopenaide1
  1058. OPENAIDE "ZzzzAIDE 1"
  1059. DECOUVREMEDIA "ZzzzAIDE"
  1060. end
  1061. --
  1062. openaide
  1063. STOPALLMOVIE ""
  1064. ADDCACHE "All"
  1065. DOFUNCTION "tryopenaide5"
  1066. ABORTIFNOTNIL "ZzzzAIDE"
  1067. DOFUNCTION "tryopenaide5b"
  1068. ABORTIFNOTNIL "ZzzzAIDE"
  1069. DOFUNCTION "tryopenaide7"
  1070. ABORTIFNOTNIL "ZzzzAIDE"
  1071. DOFUNCTION "tryopenaide6"
  1072. ABORTIFNOTNIL "ZzzzAIDE"
  1073. --DOFUNCTION "tryopenaide4"
  1074. --ABORTIFNOTNIL "ZzzzAIDE"
  1075. DOFUNCTION "tryopenaide3"
  1076. ABORTIFNOTNIL "ZzzzAIDE"
  1077. DOFUNCTION "tryopenaide2"
  1078. ABORTIFNOTNIL "ZzzzAIDE"
  1079. DOFUNCTION "tryopenaide1"
  1080. end
  1081. --
  1082. closeaide
  1083. UNLOADMEDIA "ZzzzAIDE"
  1084. CACHEMEDIA "ZzzzAIDE"
  1085. REMOVECACHE "All"
  1086. end
  1087. --
  1088. GENERIQUE
  1089. DOFUNCTION "hideparcours"
  1090. DECOUVREMEDIA "All"
  1091. UNLOADMEDIA "PanoFlDroite PanoFlGauche"
  1092. UNLOADMEDIA "ZFBSommaire ZFBRetour ZFBQuitter ZFBRecherches ZFBScenario ZFBParcours ZFBAide FBPanorama ZFBParEff ZFBParTemp ZFBVoir ZFBFermer"
  1093. UNLOADMEDIA "ZTerreBtn ZKioskBtn ZCineBtn ZTerreBtn2 ZKioskBtn2 ZCineBtn2"
  1094. UNLOADMEDIA "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  1095. UNLOADMEDIA "TitreVignettes SONGDHALL BarreDates ZoneDates VisuAnnees VisuMois YearPrev YearNext MonthPrev MonthNext"
  1096. UNLOADMEDIA "BarBas Focus"
  1097. UNLOADMEDIA "GdHall"
  1098. UNLOADMEDIA "KioskCache KioskFond KioskPano"
  1099. UNLOADMEDIA "ZSeqMovie HistFond HistPar HistCine UHPMovie"
  1100. UNLOADMEDIA "MovieActu IdlerActu ZAttenteActu"
  1101. UNLOADMEDIA "Terre"
  1102. UNLOADMEDIA "Browser Vign1 Vign2 Vign3 Vign4"
  1103. UNLOADMEDIA "VueFocus ZBrowserNext ZBrowserPrev PanoTh TitreTh TitreBrowser ZTSfocus TScroller TBrowser TBrowserNext TBrowserPrev"
  1104. UNLOADMEDIA "TVign1 TVign2 TVign3 TVign4 TVueFocus"
  1105. UNLOADMEDIA "UEMovie UEFond ZHOMovie ZMAMovie ZFOMovie ZSTMovie ZCAMovie ZCAIMovie ZECMovie ZHPMovie YFondArchives ZUEMovie ZZAVAP SON INTRO"
  1106. UNLOADMEDIA "ZzzzAIDE"
  1107. LOADMEDIA "GENERIQUE"
  1108. end
  1109. --
  1110. Initialization
  1111. LOADMEDIA "EcranOblige"
  1112. DRAW "EcranOblige"
  1113. INITUEEXTS ""
  1114. LOADMEDIA "IdlerSwitcher"
  1115. SETMOVIEEND "IdlerSwitcher 1"
  1116. ACTIVCALLBACK "IdlerSwitcher"
  1117. SENDSWITCHMSG "ready"
  1118. end
  1119. --
  1120. introduction
  1121. UNLOADMEDIA "EcranOblige"
  1122. LOADMEDIA "Beep"
  1123. LOADMEDIA "PanoFlDroite PanoFlGauche"
  1124. LOADMEDIA "ZFBSommaire ZFBRetour ZFBQuitter ZFBRecherches ZFBScenario ZFBParcours ZFBAide FBPanorama ZFBParEff ZFBParTemp ZFBVoir ZFBFermer"
  1125. LOADMEDIA "BarreDates VisuAnnees VisuMois YearPrev YearNext MonthPrev MonthNext ZoneDates BarBas GdHall Focus TitreVignettes"
  1126. HIDEMEDIA "BarreDates VisuAnnees VisuMois YearPrev YearNext MonthPrev MonthNext ZoneDates BarBas GdHall Focus TitreVignettes"
  1127. LOADMEDIA "ZMiniTitreHP ZMiniTitrePL ZMiniTitreQS ZMiniTitreUE ZMiniTitreBI ZMiniTitreAV ZMiniTitreAP ZMiniTitreCA ZMiniTitreMA ZMiniTitreUM"
  1128. LOADMEDIA "INTRO"
  1129. ACTIVCALLBACK "INTRO"
  1130. SUPPRIMECLICS ""
  1131. end
  1132. --
  1133. INIT